home *** CD-ROM | disk | FTP | other *** search
/ Info-Mac 4 / Info_Mac IV CD-ROM (Pacific HiTech Inc.)(August 1994).iso / Science / Asymptote Demo / Examples / Utility Scripts / addheader < prev    next >
Text File  |  1994-05-07  |  369b  |  21 lines
  1. hide
  2. % ADDHEADER
  3. %
  4. % Add a header to the top left corner of the page
  5. % giving the date, recorder file name and the data file
  6. %
  7. % ARGUMENTS: None
  8.  
  9. set savescale scale
  10. set saverotation rotation
  11. cliptoframe no
  12. scale .75
  13. rotation 0
  14.  
  15. pagemoveto pleft .5 + ptop .5 -
  16. drawlabel centerright \#   \r   \f   Your Name Here
  17.  
  18. scale savescale
  19. rotation saverotation
  20. cliptoframe true
  21.